home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 2 / AACD 2.iso / AACD / Online / CIM / is / CIMinstall7 next >
Encoding:
Text File  |  1998-12-19  |  3.2 KB  |  99 lines
  1. ;
  2. ; CIM's Installer Script.
  3. ; $VER: V0.94 (07.05.1998)
  4. ; Written by Jan-Erik Tervo
  5. ;
  6.  
  7. (ONERROR
  8.       (EXIT)
  9.         )
  10.  
  11. (SET @default-dest "SYS:Expansion")
  12.  
  13.  
  14.  
  15. ; ENGLISH STRINGS
  16.  
  17. (SET #alku_str
  18.      (cat "\n\n\nWelcome to the CIM Installer script.\n\nCIM (the Caller Id Manager) (C) Jan-Erik Tervo 1996,1997,1998.\n\nShareware.\n\n\n")
  19.     )
  20.  
  21. (SET #where_to_str
  22.      (cat "Select where to install CIM (A sub directory will NOT be created there).")
  23.     )
  24.  
  25. (SET #str-installing-exe
  26.      (cat "\n\nInstalling...")
  27.     )
  28.  
  29.  
  30. (MESSAGE #alku_str)
  31.  
  32. (complete 0)
  33.  
  34. (SET CIMdir "SYS:")
  35. (SET CIMdirname (TACKON CIMdir "CIM"))
  36.  
  37.  
  38. (SET CIMdir
  39.      (ASKDIR (prompt #where_to_str)
  40.                                    (HELP "No help for this function")
  41.                                    (DEFAULT @default-dest)
  42.  
  43.            )
  44. )
  45.  
  46. (SET @default-dest CIMdir)
  47.  
  48.  
  49.  
  50. (complete 25)
  51.  
  52. ;  Install Stuff
  53.  
  54.  
  55. (copyfiles
  56.         (help "No help for this function")
  57.         (source "Stuff/")
  58.         (pattern "#?")
  59.         (dest CIMdir)
  60.         (prompt #str-installing-exe)
  61.          )
  62.  
  63. (complete 50)
  64.  
  65.  
  66.  
  67.  
  68. (startup "CIM - http://www.netti.fi/~jet/cim/"
  69.      (prompt
  70.           "\nSome instructions need to be added to the \"s:user-startup\" so that your system will be properly configured to use CIM.")
  71.      (help "No help for this function")
  72.      (command "ASSIGN CIM: " CIMdir)
  73. )
  74.  
  75.  
  76.                                                                                                                                                                                                                                 (complete 70)
  77.  
  78.                                                                                                                                                                                                                                 (IF (exists "cim_v2.key")
  79.                                                                                                                                                                                                                                       (copyfiles
  80.                                                                                                                                                                                                                                            (source "cim_v2.key")
  81.                                                                                                                                                                                                                                            (dest "s:")
  82.                                                                                                                                                                                                                                                   )
  83.                                                                                                                                                                                                                                        )
  84.  
  85. (complete 90)
  86.  
  87. (MESSAGE "\n\nInstallation completed.\n\n\nCIM's Official Home Page located at: http://www.netti.fi/~jet/cim\n")
  88.  
  89. (run "assign CIM:" CIMdir)
  90.  
  91. (run "protect CIM:bin/cim rwed")
  92.  
  93. (complete 100)
  94.  
  95. ; end of installation
  96.  
  97. (exit)
  98.  
  99.